---
title: "Scatter plot of air pollution and brain marker"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
    social: menu
    source_code: embed
---

```{r setup, include=FALSE}
library(flexdashboard)
# prepare the data
source("functions/scatter_plot.R")
```
{.sidebar}
-----------------------------------------------------------------------
```{r}

```

Longitudinal plot
=======================================================================


Column {data-width=650}
-----------------------------------------------------------------------

### Chart A

```{r}

```

Column {data-width=350}
-----------------------------------------------------------------------

### Chart B

```{r}

```

### Chart C

```{r}

```